﻿Public Class ArticlePreviewModel
    Public Property ArticleID As String
    Public Property ArticleDescription As String
    Public Property ArticlePrice As Money
    Public Property ArticleUnit As String
    Public Property Category As String

    Public Overrides Function Equals(obj As Object) As Boolean
        If obj.GetType = GetType(ArticlePreviewModel) Then
            Try
                Dim item As ArticlePreviewModel = obj
                If item.ArticleID = ArticleID Then
                    Return True
                Else
                    Return False
                End If
            Catch : Return False : End Try
        End If
        Return False
    End Function
End Class
